home *** CD-ROM | disk | FTP | other *** search
/ An Introduction to Progr…l Basic 6.0 (4th Edition) / An Introduction to Programming using Visual Basic 6.0.iso / COMMON / TOOLS / VB / CABINETS / MSDAO350.CAB / icontrols / DataList / ComboEdit.class (.txt) < prev    next >
Encoding:
Java Class File  |  1998-01-08  |  842 b   |  26 lines

  1. package icontrols.DataList;
  2.  
  3. import com.ms.wd.app.Message;
  4. import com.ms.wd.ui.Control;
  5. import com.ms.wd.ui.Edit;
  6.  
  7. class ComboEdit extends Edit {
  8.    protected void wndProc(Message msg) {
  9.       switch (msg.msg) {
  10.          case 258:
  11.             if (msg.wParam > 31) {
  12.                ((DataCombo)((Control)this).getParent()).processEditChar(msg.wParam);
  13.             } else {
  14.                super.wndProc(msg);
  15.             }
  16.             break;
  17.          case 646:
  18.             ((DataCombo)((Control)this).getParent()).processEditChar(msg.wParam);
  19.             break;
  20.          default:
  21.             super.wndProc(msg);
  22.       }
  23.  
  24.    }
  25. }
  26.